﻿Public Class FormRadioSearch
	Dim player As New Windows.Media.MediaPlayer
	Private Sub ButtonPlay_Click(sender As System.Object, e As System.EventArgs) Handles ButtonPlay.Click
		Dim methodRadioSearch As New RadioSearch(TextBoxSearch.Text)
		methodRadioSearch.sendRequest()

		Dim response = methodRadioSearch.getResponse()

		Dim methodRadioTune As New RadioTune(response.station.url, "")
		methodRadioTune.sendRequest()

		Dim response2 = methodRadioTune.getResponse()

		'Dim player As New Windows.Media.MediaPlayer
		player.Open(New Uri(response2.station.url))
		player.Play()

	End Sub
End Class